home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128Toolkit / DISKSEARCH.ARC / SRCH DSK 4 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  263 b   |  13 lines
  1. 10 ;SRCH DSK 4
  2. 20 SECTOR LDA TRK; CALCULATE NUMBER OF SECTORS ON TRACK
  3. 30 LDX BOUND; # 4
  4. 40 S CMP BOUND,X
  5. 50 DEX
  6. 60 BCS S
  7. 70 LDA TOTAL,X;# OF SEC ON THIS TRK
  8. 75 STA SEC
  9. 95 RTS
  10. 100 BOUND .BYTE 04 36 31 25 18
  11. 110 TOTAL .BYTE 16 17 18 20
  12. 130 .FILE SRCH DSK 5
  13.